*** REPLICATION FIGURES 3 AND 6 ***

clear
 use "Figures3_6.dta" , clear


*** FIGURE 3 ***
sort var2 
gen obsno = _n
labmask obsno, values(country) 
twoway (scatter var2 obsno ) , xla(1/28, valuelabel ang(v) noticks) ///
xtitle("") ytitle("Net Transfers as % of GNI") xline(10.5) xline(19.5) ///
graphregion(color(white)) bgcolor(white)
graph save Figures3.gph, replace

*** FIGURE 6 ***
sort absolute 
gen obsno2 = _n
labmask obsno2, values(country) 
twoway (scatter absolute obsno2 ) , xla(1/28, valuelabel ang(v) noticks) ///
xtitle("") ytitle("Absolute Net Transfers") xline(10.5) xline(20.5) ///
graphregion(color(white)) bgcolor(white)
graph save Figures6.gph, replace